home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The Arcade•
/
MacNinja 3.0 ••••
/
MacNinja 3.0 ееее.rsrc
/
CODE_20_PrintCalls.txt
< prev
next >
Wrap
Text File
|
1990-02-08
|
16KB
|
279 lines
# near model CODE resource
# jump table entries: 152-152 (1 of them)
export_19:
fn00000000:
00000000 2F0B move.l -[A7], A3
00000002 203C 0000 A89F move.l D0, 0xA89F
00000008 A146 syscall GetTrapAddress, flags=1
0000000A 2648 movea.l A3, A0
0000000C 203C 0000 A8FD move.l D0, 0xA8FD
00000012 A146 syscall GetTrapAddress, flags=1
00000014 B7C8 cmpa.l A3, A0
00000016 6746 beq +0x48 /* 0000005E */
00000018 265F movea.l A3, [A7]+
0000001A 4E56 0000 link A6, 0
0000001E 41EE 0008 lea.l A0, [A6 + 0x8]
00000022 7007 moveq.l D0, 0x07
00000024 C02E 0008 and.b D0, [A6 + 0x8]
00000028 D02E 000A add.b D0, [A6 + 0xA]
0000002C 5800 addq.b D0, 4
0000002E 9EC0 sub.w A7, D0
00000030 224F movea.l A1, A7
00000032 A02E syscall BlockMove/BlockMoveData
00000034 A8FD syscall PrGlue
00000036 7200 moveq.l D1, 0x00
00000038 122E 000A move.b D1, [A6 + 0xA]
0000003C 7007 moveq.l D0, 0x07
0000003E C02E 0008 and.b D0, [A6 + 0x8]
00000042 6710 beq +0x12 /* 00000054 */
00000044 204F movea.l A0, A7
00000046 43F6 100C lea.l A1, [A6 + D1.w + 0xC]
0000004A E248 lsr D0.w, 1
0000004C 6002 bra +0x4 /* 00000050 */
label0000004E:
0000004E 32DF move.w [A1]+, [A7]+
label00000050:
00000050 51C8 FFFC dbf D0, -0x6 /* 0000004E */
label00000054:
00000054 4E5E unlink A6
00000056 205F movea.l A0, [A7]+
00000058 DFC1 add.l A7, D1
0000005A 584F addq.w A7, 4
0000005C 4ED0 jmp [A0]
label0000005E:
0000005E 265F movea.l A3, [A7]+
00000060 4E56 0000 link A6, 0
00000064 48E7 0018 movem.l -[A7], A3,A4
00000068 7200 moveq.l D1, 0x00
0000006A 122E 0008 move.b D1, [A6 + 0x8]
0000006E E609 lsr D1.b, 3
00000070 6718 beq +0x1A /* 0000008A */
00000072 4A2E 0008 tst.b [A6 + 0x8]
00000076 6B00 00C2 bmi +0xC4 /* 0000013A */
0000007A 7400 moveq.l D2, 0x00
0000007C 142E 0009 move.b D2, [A6 + 0x9]
00000080 661E bne +0x20 /* 000000A0 */
00000082 7403 moveq.l D2, 0x03
00000084 C438 0946 and.b D2, [0x00000946 /* ChooserBits */]
00000088 6016 bra +0x18 /* 000000A0 */
label0000008A:
0000008A 206E 0014 movea.l A0, [A6 + 0x14]
0000008E 2050 movea.l A0, [A0]
00000090 7403 moveq.l D2, 0x03
00000092 C428 0044 and.b D2, [A0 + 0x44]
00000096 0238 00FC 0946 andi.b [0x00000946 /* ChooserBits */], 0xFC
0000009C 8538 0946 or.b [0x00000946 /* ChooserBits */], D2
label000000A0:
000000A0 3678 0A5A movea.w A3, [0x00000A5A /* CurMap */]
000000A4 42A7 clr.l -[A7]
000000A6 2F3C 5044 4546 move.l -[A7], 0x50444546 /* 'PDEF' */
000000AC 3F02 move.w -[A7], D2
000000AE A9A0 syscall GetResource
000000B0 201F move.l D0, [A7]+
000000B2 4A80 tst.l D0
000000B4 664A bne +0x4C /* 00000100 */
000000B6 0C78 FFFF 0952 cmpi.w [0x00000952 /* PrRefNum */], 0xFFFF
000000BC 670C beq +0xE /* 000000CA */
000000BE 3F38 0952 move.w -[A7], [0x00000952 /* PrRefNum */]
000000C2 A998 syscall UseResFile
000000C4 4A78 0A60 tst.w [0x00000A60 /* ResErr */]
000000C8 6716 beq +0x18 /* 000000E0 */
label000000CA:
000000CA 6100 01D0 bsr +0x1D2 /* 0000029C */
000000CE 4A40 tst.w D0
000000D0 6708 beq +0xA /* 000000DA */
000000D2 31C0 0944 move.w [0x00000944 /* PrintErr */], D0
000000D6 6000 00B0 bra +0xB2 /* 00000188 */
label000000DA:
000000DA 3F38 0952 move.w -[A7], [0x00000952 /* PrRefNum */]
000000DE A998 syscall UseResFile
label000000E0:
000000E0 42A7 clr.l -[A7]
000000E2 2F3C 5044 4546 move.l -[A7], 0x50444546 /* 'PDEF' */
000000E8 3F02 move.w -[A7], D2
000000EA A9A0 syscall GetResource
000000EC 201F move.l D0, [A7]+
000000EE 4A80 tst.l D0
000000F0 660E bne +0x10 /* 00000100 */
000000F2 3F0B move.w -[A7], A3
000000F4 A998 syscall UseResFile
000000F6 31FC FF40 0944 move.w [0x00000944 /* PrintErr */], 0xFF40
000000FC 6000 008A bra +0x8C /* 00000188 */
label00000100:
00000100 2840 movea.l A4, D0
00000102 204C movea.l A0, A4
00000104 A029 syscall HLock
00000106 3F0B move.w -[A7], A3
00000108 A998 syscall UseResFile
0000010A 41EE 000C lea.l A0, [A6 + 0xC]
0000010E 7007 moveq.l D0, 0x07
00000110 C02E 0008 and.b D0, [A6 + 0x8]
00000114 D02E 000A add.b D0, [A6 + 0xA]
00000118 9EC0 sub.w A7, D0
0000011A 224F movea.l A1, A7
0000011C A02E syscall BlockMove/BlockMoveData
0000011E 102E 000B move.b D0, [A6 + 0xB]
00000122 0200 007F andi.b D0, 0x7F
00000126 2054 movea.l A0, [A4]
00000128 4EB0 0000 jsr [A0 + D0.w]
0000012C 102E 000B move.b D0, [A6 + 0xB]
00000130 6A04 bpl +0x6 /* 00000136 */
00000132 204C movea.l A0, A4
00000134 A02A syscall HUnlock
label00000136:
00000136 6000 011A bra +0x11C /* 00000252 */
label0000013A:
0000013A 9EFC 0032 sub.w A7, 0x32 /* '2' */
0000013E 41FA 0194 lea.l A0, [PC + 0x194 /* 000002D4, value 0x62E5072, pstring ".Print" */]
00000142 2F48 0012 move.l [A7 + 0x12], A0
00000146 3F7C FFFD 0018 move.w [A7 + 0x18], 0xFFFD
0000014C 422F 001B clr.b [A7 + 0x1B]
00000150 204F movea.l A0, A7
00000152 7000 moveq.l D0, 0x00
00000154 0881 0004 bclr.b D1, 0x4
00000158 D241 add.w D1, D1
0000015A 323B 1006 move.w D1, [PC + D1.w + 0x6]
0000015E 4EFB 1002 jmp [PC + D1.w + 0x2]
00000162 0068 006C 0070 ori.w [A0 + 0x70], 0x6C /* 'l' */
00000168 007A 008C 00A8 ori.w [PC + 0xA8 /* 00000212, value 0x5, cstring "" */], 0x8C
0000016E 00BA 00DA 00E4 0030 ori.l [PC + 0x30 /* 000001A0, value 0x66247200 'f$r\0', cstring "f$r" */], 0xDA00E4
00000176 0044 0020 ori.w D4, 0x20 /* ' ' */
0000017A 0020 0020 ori.b -[A0], 0x20 /* ' ' */
0000017E 0020 0020 ori.b -[A0], 0x20 /* ' ' */
00000182 31FC FFCE 0944 move.w [0x00000944 /* PrintErr */], 0xFFCE
label00000188:
00000188 7200 moveq.l D1, 0x00
0000018A 122E 000A move.b D1, [A6 + 0xA]
0000018E 6000 00E0 bra +0xE2 /* 00000270 */
00000192 2F3C 8000 0000 move.l -[A7], 0x80000000
00000198 4EBA FE66 jsr [PC - 0x19A /* 00000000 */]
0000019C 3038 0944 move.w D0, [0x00000944 /* PrintErr */]
000001A0 6624 bne +0x26 /* 000001C6 */
000001A2 7200 moveq.l D1, 0x00
000001A4 6002 bra +0x4 /* 000001A8 */
000001A6 7201 moveq.l D1, 0x01
label000001A8:
000001A8 6100 00F2 bsr +0xF4 /* 0000029C */
000001AC 4A40 tst.w D0
000001AE 6616 bne +0x18 /* 000001C6 */
000001B0 3038 0952 move.w D0, [0x00000952 /* PrRefNum */]
000001B4 4A78 0A60 tst.w [0x00000A60 /* ResErr */]
000001B8 6608 bne +0xA /* 000001C2 */
000001BA 4A41 tst.w D1
000001BC 6704 beq +0x6 /* 000001C2 */
000001BE 3F00 move.w -[A7], D0
000001C0 A99A syscall CloseResFile
label000001C2:
000001C2 3038 0A60 move.w D0, [0x00000A60 /* ResErr */]
label000001C6:
000001C6 6000 0082 bra +0x84 /* 0000024A */
000001CA A000 syscall Open/PBHOpen/HOpen
000001CC 607C bra +0x7E /* 0000024A */
000001CE A001 syscall Close
000001D0 6078 bra +0x7A /* 0000024A */
000001D2 615A bsr +0x5C /* 0000022E */
000001D4 DEFC 002E add.w A7, 0x2E /* '.' */
000001D8 2E88 move.l [A7], A0
000001DA 6076 bra +0x78 /* 00000252 */
000001DC 6150 bsr +0x52 /* 0000022E */
000001DE 2050 movea.l A0, [A0]
000001E0 7000 moveq.l D0, 0x00
000001E2 1028 0007 move.b D0, [A0 + 0x7]
000001E6 DEFC 0030 add.w A7, 0x30 /* '0' */
000001EA 3E80 move.w [A7], D0
000001EC 6064 bra +0x66 /* 00000252 */
000001EE 216E 000C 0024 move.l [A0 + 0x24], [A6 + 0xC]
000001F4 216E 0010 0020 move.l [A0 + 0x20], [A6 + 0x10]
000001FA 216E 0014 001C move.l [A0 + 0x1C], [A6 + 0x14]
00000200 316E 0018 001A move.w [A0 + 0x1A], [A6 + 0x18]
00000206 A004 syscall Control
00000208 6040 bra +0x42 /* 0000024A */
0000020A 6122 bsr +0x24 /* 0000022E */
0000020C 2050 movea.l A0, [A0]
0000020E 0828 0006 0005 btst.b [A0 + 0x5], 0x6
00000214 6734 beq +0x36 /* 0000024A */
00000216 2050 movea.l A0, [A0]
00000218 A049 syscall HPurge
0000021A 602E bra +0x30 /* 0000024A */
0000021C 6110 bsr +0x12 /* 0000022E */
0000021E 2050 movea.l A0, [A0]
00000220 0828 0006 0005 btst.b [A0 + 0x5], 0x6
00000226 6722 beq +0x24 /* 0000024A */
00000228 2050 movea.l A0, [A0]
0000022A A04A syscall HNoPurge
0000022C 601C bra +0x1E /* 0000024A */
fn0000022E:
0000022E 317C 0001 001A move.w [A0 + 0x1A], 0x1
00000234 A005 syscall Status
00000236 2068 001C movea.l A0, [A0 + 0x1C]
0000023A 4E75 rts
0000023C DEFC 0030 add.w A7, 0x30 /* '0' */
00000240 3EB8 0944 move.w [A7], [0x00000944 /* PrintErr */]
00000244 600C bra +0xE /* 00000252 */
00000246 302E 000C move.w D0, [A6 + 0xC]
label0000024A:
0000024A DEFC 0032 add.w A7, 0x32 /* '2' */
0000024E 31C0 0944 move.w [0x00000944 /* PrintErr */], D0
label00000252:
00000252 7200 moveq.l D1, 0x00
00000254 122E 000A move.b D1, [A6 + 0xA]
00000258 7007 moveq.l D0, 0x07
0000025A C02E 0008 and.b D0, [A6 + 0x8]
0000025E 6710 beq +0x12 /* 00000270 */
00000260 204F movea.l A0, A7
00000262 43F6 100C lea.l A1, [A6 + D1.w + 0xC]
00000266 E248 lsr D0.w, 1
00000268 6002 bra +0x4 /* 0000026C */
label0000026A:
0000026A 32DF move.w [A1]+, [A7]+
label0000026C:
0000026C 51C8 FFFC dbf D0, -0x6 /* 0000026A */
label00000270:
00000270 4CDF 1800 movem.l A3,A4, [A7]+
00000274 4E5E unlink A6
00000276 205F movea.l A0, [A7]+
00000278 DFC1 add.l A7, D1
0000027A 584F addq.w A7, 4
0000027C 4ED0 jmp [A0]
fn0000027E:
0000027E 7000 moveq.l D0, 0x00
fn00000280:
00000280 9EFC 0040 sub.w A7, 0x40 /* '@' */
00000284 204F movea.l A0, A7
00000286 3140 0016 move.w [A0 + 0x16], D0
0000028A 42A8 0012 clr.l [A0 + 0x12]
0000028E A015 syscall SetVol/PBHSetVol/HSetVol
00000290 A014 syscall GetVol/PBHGetVol/HGetVol
00000292 3028 0016 move.w D0, [A0 + 0x16]
00000296 DEFC 0040 add.w A7, 0x40 /* '@' */
0000029A 4E75 rts
fn0000029C:
0000029C 594F subq.w A7, 4
0000029E 3F3C E000 move.w -[A7], 0xE000
000002A2 A9BA syscall GetString
000002A4 201F move.l D0, [A7]+
000002A6 6606 bne +0x8 /* 000002AE */
000002A8 303C FF40 move.w D0, 0xFF40
000002AC 6024 bra +0x26 /* 000002D2 */
label000002AE:
000002AE 2240 movea.l A1, D0
000002B0 61CC bsr -0x32 /* 0000027E */
000002B2 4841 swap.w D1
000002B4 3200 move.w D1, D0
000002B6 554F subq.w A7, 2
000002B8 2049 movea.l A0, A1
000002BA A029 syscall HLock
000002BC 2F11 move.l -[A7], [A1]
000002BE A997 syscall OpenResFile
000002C0 31DF 0952 move.w [0x00000952 /* PrRefNum */], [A7]+
000002C4 2049 movea.l A0, A1
000002C6 A02A syscall HUnlock
000002C8 3001 move.w D0, D1
000002CA 4841 swap.w D1
000002CC 61B2 bsr -0x4C /* 00000280 */
000002CE 3038 0A60 move.w D0, [0x00000A60 /* ResErr */]
label000002D2:
000002D2 4E75 rts
000002D4 062E 5072 696E addi.b [A6 + 0x696E], 0x72 /* 'r' */
000002DA 7420 moveq.l D2, 0x20